home *** CD-ROM | disk | FTP | other *** search
/ Aminet 4 / Aminet 4 - November 1994.iso / aminet / dev / gui / muibuilderv11.lha / muibuilder / mb / asm / includes / mui_alt.i next >
Text File  |  1994-03-15  |  47KB  |  1,169 lines
  1. ****************************************************************************
  2. **
  3. ** MUI - MagicUserInterface
  4. ** (c) 1993 by Stefan Stuntz
  5. **
  6. ** Main Header File
  7. **
  8. *** Assembler modifications 26-Aug-93 by Henri Veisterä.
  9. *** Modifications for MUIBuilder 16-Mar-94 by Michal Kara
  10. **
  11. ****************************************************************************
  12. ** General Header File Information
  13. ****************************************************************************
  14. **
  15. ** All macro and structure definitions follow these rules:
  16. **
  17. ** Name                       Meaning
  18. **
  19. ** MUIC_<class>               Name of a class
  20. ** MUIM_<class>_<method>      Method
  21. ** MUIP_<class>_<method>      Methods parameter structure
  22. ** MUIV_<class>_<method>_<x>  Special method value
  23. ** MUIA_<class>_<attrib>      Attribute
  24. ** MUIV_<class>_<attrib>_<x>  Special attribute value
  25. ** MUIE_<error>               Error return code from MUI_Error()
  26. ** MUII_<name>                Standard MUI image
  27. **
  28. ** MUIA_... attribute definitions are followed by a comment
  29. ** consisting of the three possible letters I, S and G.
  30. ** I: it's possible to specify this attribute at object creation time.
  31. ** S: it's possible to change this attribute with SetAttrs().
  32. ** G: it's possible to get this attribute with GetAttr().
  33. **
  34.  
  35.  
  36.    IFND LIBRARIES_MUI_I
  37. LIBRARIES_MUI_I SET 1
  38.  
  39.    IFND EXEC_TYPES_I
  40.    INCLUDE "exec/types.i"
  41.    ENDC  ;EXEC_TYPES_I
  42.  
  43.    IFND INTUITION_CLASSES_I
  44.    INCLUDE "intuition/classes.i"
  45.    ENDC  ;INTUITION_CLASSES_I
  46.  
  47.    IFND INTUITION_SCREENS_I
  48.    INCLUDE "intuition/screens.i"
  49.    ENDC  ;INTUITION_SCREENS_I
  50.  
  51.    IFND UTILITY_HOOKS_I
  52.    INCLUDE "utility/hooks.i"
  53.    ENDC  ;UTILITY_HOOKS_I
  54.  
  55.  
  56.  
  57. ****************************************************************************
  58. ** Library specification
  59. ****************************************************************************
  60.  
  61. MUIMASTER_NAME MACRO
  62.          dc.b     "muimaster.library",0
  63.          even
  64.          ENDM
  65. MUIMASTER_VMIN EQU 4
  66. CALLMUI  MACRO   ; Func
  67.          MOVE.L  MUIMASTER_BASE,a6
  68.          JSR     _LVO\1(a6)
  69.          ENDM
  70. NULL     equ      0
  71. TRUE     equ      1
  72. FALSE    equ      NULL
  73.  
  74.  
  75. ****************************************************************************
  76. ** ARexx Interface
  77. ****************************************************************************
  78.  
  79.  STRUCTURE MUI_Command,0
  80.    APTR     mc_Name
  81.    APTR     mc_Template
  82.    LONG     mc_Parameters
  83.    STRUCT   mc_Hook,h_SIZEOF
  84.    STRUCT   mc_Reserved,4*5
  85.    LABEL    MUI_Command_SIZEOF
  86.  
  87. MC_TEMPLATE_ID EQU ~0
  88.  
  89.  
  90. ****************************************************************************
  91. ** Return values for MUI_Error()
  92. ****************************************************************************
  93.  
  94. MUIE_OK                    EQU 0
  95. MUIE_OutOfMemory           EQU 1
  96. MUIE_OutOfGfxMemory        EQU 2
  97. MUIE_InvalidWindowObject   EQU 3
  98. MUIE_MissingLibrary        EQU 4
  99. MUIE_NoARexx               EQU 5
  100. MUIE_SingleTask            EQU 6
  101.  
  102.  
  103.  
  104. ****************************************************************************
  105. ** Standard MUI Images
  106. ****************************************************************************
  107.  
  108. MUII_WindowBack      EQU 0
  109. MUII_RequesterBack   EQU 1
  110. MUII_ButtonBack      EQU 2
  111. MUII_ListBack        EQU 3
  112. MUII_TextBack        EQU 4
  113. MUII_PropBack        EQU 5
  114. MUII_ActiveBack      EQU 6
  115. MUII_SelectedBack    EQU 7
  116. MUII_ListCursor      EQU 8
  117. MUII_ListSelect      EQU 9
  118. MUII_ListSelCur      EQU 10
  119. MUII_ArrowUp         EQU 11
  120. MUII_ArrowDown       EQU 12
  121. MUII_ArrowLeft       EQU 13
  122. MUII_ArrowRight      EQU 14
  123. MUII_CheckMark       EQU 15
  124. MUII_RadioButton     EQU 16
  125. MUII_Cycle           EQU 17
  126. MUII_PopUp           EQU 18
  127. MUII_PopFile         EQU 19
  128. MUII_PopDrawer       EQU 20
  129. MUII_PropKnob        EQU 21
  130. MUII_Drawer          EQU 22
  131. MUII_HardDisk        EQU 23
  132. MUII_Disk            EQU 24
  133. MUII_Chip            EQU 25
  134. MUII_Volume          EQU 26
  135. MUII_PopUpBack       EQU 27
  136. MUII_Network         EQU 28
  137. MUII_Assign          EQU 29
  138. MUII_TapePlay        EQU 30
  139. MUII_TapePlayBack    EQU 31
  140. MUII_TapePause       EQU 32
  141. MUII_TapeStop        EQU 33
  142. MUII_TapeRecord      EQU 34
  143. MUII_GroupBack       EQU 35
  144. MUII_SliderBack      EQU 36
  145. MUII_SliderKnob      EQU 37
  146. MUII_TapeUp          EQU 38
  147. MUII_TapeDown        EQU 39
  148. MUII_Count           EQU 40
  149.  
  150. MUII_BACKGROUND      EQU (128+0)
  151. MUII_SHADOW          EQU (128+1)
  152. MUII_SHINE           EQU (128+2)
  153. MUII_FILL            EQU (128+3)
  154. MUII_SHADOWBACK      EQU (128+4)
  155. MUII_SHADOWFILL      EQU (128+5)
  156. MUII_SHADOWSHINE     EQU (128+6)
  157. MUII_FILLBACK        EQU (128+7)
  158. MUII_FILLSHINE       EQU (128+8)
  159. MUII_SHINEBACK       EQU (128+9)
  160. MUII_FILLBACK2       EQU (128+10)
  161. MUII_HSHINEBACK      EQU (128+11)
  162. MUII_HSHADOWBACK     EQU (128+12)
  163. MUII_HSHINESHINE     EQU (128+13)
  164. MUII_HSHADOWSHADOW   EQU (128+14)
  165. MUII_N1HSHINE        EQU (128+15)
  166. MUII_LASTPAT         EQU (128+16)
  167.  
  168.  
  169. ****************************************************************************
  170. ** Special values for some methods 
  171. ****************************************************************************
  172.  
  173. MUIV_TriggerValue       EQU $49893131
  174. MUIV_EveryTime          EQU $49893131
  175.  
  176. MUIV_Application_Save_ENV     EQU 0
  177. MUIV_Application_Save_ENVARC  EQU ~0
  178. MUIV_Application_Load_ENV     EQU 0
  179. MUIV_Application_Load_ENVARC  EQU ~0
  180.  
  181. MUIV_Application_ReturnID_Quit   EQU -1
  182.  
  183. MUIV_List_Insert_Top       EQU 0
  184. MUIV_List_Insert_Active    EQU -1
  185. MUIV_List_Insert_Sorted    EQU -2
  186. MUIV_List_Insert_Bottom    EQU -3
  187.  
  188. MUIV_List_Remove_First     EQU 0
  189. MUIV_List_Remove_Active    EQU -1
  190. MUIV_List_Remove_Last      EQU -2
  191.  
  192. MUIV_List_Select_Off       EQU 0
  193. MUIV_List_Select_On        EQU 1
  194. MUIV_List_Select_Toggle    EQU 2
  195. MUIV_List_Select_Ask       EQU 3
  196.  
  197. MUIV_List_Jump_Active      EQU -1
  198. MUIV_List_GetEntry_Active  EQU -1
  199. MUIV_List_Select_Active    EQU -1
  200. MUIV_List_Select_All       EQU -2
  201.  
  202. MUIV_List_Redraw_Active    EQU -1
  203. MUIV_List_Redraw_All       EQU -2
  204.  
  205. MUIV_List_Exchange_Active  EQU -1
  206.  
  207. MUIV_Colorpanel_GetColor_Active EQU -1
  208. MUIV_Colorpanel_SetColor_Active EQU -1
  209.  
  210. **************************************************************************
  211. ** Control codes for text strings
  212. **************************************************************************
  213.  
  214. ;;;;;;;;;;;!!!!!!!!!!!!!!!!                 
  215.  
  216. ***************************************************************************
  217. ** Parameter structures for some classes
  218. ***************************************************************************
  219.  
  220.                  STRUCTURE    MUI_Palette_Entry,0
  221.                  LONG  mpe_ID
  222.                  ULONG mpe_Red
  223.                  ULONG mpe_Green
  224.                  ULONG mpe_Blue
  225.                  LONG  mpe_Group
  226.                  LABEL        MUI_Palette_Entry_SIZEOF
  227.  
  228. MUIV_Palette_Entry_End   EQU   -1
  229.  
  230.                  STRUCTURE    MUI_Scrmodelist_Entry,0
  231.                  CPTR         sme_Name
  232.                  ULONG        sme_ModeID
  233.                  LABEL        MUI_Scrmodelist_Entry_SIZEOF
  234.  
  235. ;****************************************************************************
  236. ;** Notify.mui 7.13 (01.12.93)                                             **
  237. ;****************************************************************************
  238.  
  239. ;** Methods **
  240.  
  241. MUIM_CallHook                  EQU $8042b96b
  242. MUIM_KillNotify                EQU $8042d240
  243. MUIM_MultiSet                  EQU $8042d356
  244. MUIM_Notify                    EQU $8042c9cb
  245. MUIM_Set                       EQU $8042549a
  246. MUIM_SetAsString               EQU $80422590
  247. MUIM_WriteLong                 EQU $80428d86
  248. MUIM_WriteString               EQU $80424bf4
  249.  
  250. ;** Attributes **
  251.  
  252. MUIA_AppMessage                 EQU $80421955 ;** ..g struct AppMessage * **
  253. MUIA_HelpFile                   EQU $80423a6e ;** isg STRPTR            **
  254. MUIA_HelpLine                   EQU $8042a825 ;** isg LONG              **
  255. MUIA_HelpNode                   EQU $80420b85 ;** isg STRPTR            **
  256. MUIA_NoNotify                   EQU $804237f9 ;** .s. BOOL              **
  257. MUIA_Revision                   EQU $80427eaa ;** ..g LONG              **
  258. MUIA_UserData                   EQU $80420313 ;** isg ULONG             **
  259. MUIA_Version                    EQU $80422301 ;** ..g LONG              **
  260.  
  261.  
  262.  
  263. ;****************************************************************************
  264. ;** Application.mui 7.12 (28.11.93)                                        **
  265. ;****************************************************************************
  266.  
  267. ;** Methods **
  268.  
  269. MUIM_Application_GetMenuCheck  EQU $8042c0a7
  270. MUIM_Application_GetMenuState  EQU $8042a58f
  271. MUIM_Application_Input         EQU $8042d0f5
  272. MUIM_Application_InputBuffered EQU $80427e59
  273. MUIM_Application_Load          EQU $8042f90d
  274. MUIM_Application_PushMethod    EQU $80429ef8
  275. MUIM_Application_ReturnID      EQU $804276ef
  276. MUIM_Application_Save          EQU $804227ef
  277. MUIM_Application_SetMenuCheck  EQU $8042a707
  278. MUIM_Application_SetMenuState  EQU $80428bef
  279. MUIM_Application_ShowHelp      EQU $80426479
  280.  
  281. ;** Attributes **
  282.  
  283. MUIA_Application_Active         EQU $804260ab ;** isg BOOL              **
  284. MUIA_Application_Author         EQU $80424842 ;** i.g STRPTR            **
  285. MUIA_Application_Base           EQU $8042e07a ;** i.g STRPTR            **
  286. MUIA_Application_Broker         EQU $8042dbce ;** ..g Broker *          **
  287. MUIA_Application_BrokerHook     EQU $80428f4b ;** isg struct Hook *     **
  288. MUIA_Application_BrokerPort     EQU $8042e0ad ;** ..g struct MsgPort *  **
  289. MUIA_Application_BrokerPri      EQU $8042c8d0 ;** i.g LONG              **
  290. MUIA_Application_Commands       EQU $80428648 ;** isg struct MUI_Command * **
  291. MUIA_Application_Copyright      EQU $8042ef4d ;** i.g STRPTR            **
  292. MUIA_Application_Description    EQU $80421fc6 ;** i.g STRPTR            **
  293. MUIA_Application_DiskObject     EQU $804235cb ;** isg struct DiskObject * **
  294. MUIA_Application_DoubleStart    EQU $80423bc6 ;** ..g BOOL              **
  295. MUIA_Application_DropObject     EQU $80421266 ;** is. Object *          **
  296. MUIA_Application_Iconified      EQU $8042a07f ;** .sg BOOL              **
  297. MUIA_Application_Menu           EQU $80420e1f ;** i.g struct NewMenu *  **
  298. MUIA_Application_MenuAction     EQU $80428961 ;** ..g ULONG             **
  299. MUIA_Application_MenuHelp       EQU $8042540b ;** ..g ULONG             **
  300. MUIA_Application_RexxHook       EQU $80427c42 ;** isg struct Hook *     **
  301. MUIA_Application_RexxMsg        EQU $8042fd88 ;** ..g struct RxMsg *    **
  302. MUIA_Application_RexxString     EQU $8042d711 ;** .s. STRPTR            **
  303. MUIA_Application_SingleTask     EQU $8042a2c8 ;** i.. BOOL              **
  304. MUIA_Application_Sleep          EQU $80425711 ;** .s. BOOL              **
  305. MUIA_Application_Title          EQU $804281b8 ;** i.g STRPTR            **
  306. MUIA_Application_Version        EQU $8042b33f ;** i.g STRPTR            **
  307. MUIA_Application_Window         EQU $8042bfe0 ;** i.. Object *          **
  308.  
  309.  
  310.  
  311. ;****************************************************************************
  312. ;** Window.mui 7.16 (03.12.93)                                             **
  313. ;****************************************************************************
  314.  
  315. ;** Methods **
  316.  
  317. MUIM_Window_GetMenuCheck       EQU $80420414
  318. MUIM_Window_GetMenuState       EQU $80420d2f
  319. MUIM_Window_ScreenToBack       EQU $8042913d
  320. MUIM_Window_ScreenToFront      EQU $804227a4
  321. MUIM_Window_SetCycleChain      EQU $80426510
  322. MUIM_Window_SetMenuCheck       EQU $80422243
  323. MUIM_Window_SetMenuState       EQU $80422b5e
  324. MUIM_Window_ToBack             EQU $8042152e
  325. MUIM_Window_ToFront            EQU $8042554f
  326.  
  327. ;** Attributes **
  328.  
  329. MUIA_Window_Activate            EQU $80428d2f ;** isg BOOL              **
  330. MUIA_Window_ActiveObject        EQU $80427925 ;** .sg Object *          **
  331. MUIA_Window_AltHeight           EQU $8042cce3 ;** i.g LONG              **
  332. MUIA_Window_AltLeftEdge         EQU $80422d65 ;** i.g LONG              **
  333. MUIA_Window_AltTopEdge          EQU $8042e99b ;** i.g LONG              **
  334. MUIA_Window_AltWidth            EQU $804260f4 ;** i.g LONG              **
  335. MUIA_Window_AppWindow           EQU $804280cf ;** i.. BOOL              **
  336. MUIA_Window_Backdrop            EQU $8042c0bb ;** i.. BOOL              **
  337. MUIA_Window_Borderless          EQU $80429b79 ;** i.. BOOL              **
  338. MUIA_Window_CloseGadget         EQU $8042a110 ;** i.. BOOL              **
  339. MUIA_Window_CloseRequest        EQU $8042e86e ;** ..g BOOL              **
  340. MUIA_Window_DefaultObject       EQU $804294d7 ;** isg Object *          **
  341. MUIA_Window_DepthGadget         EQU $80421923 ;** i.. BOOL              **
  342. MUIA_Window_DragBar             EQU $8042045d ;** i.. BOOL              **
  343. MUIA_Window_Height              EQU $80425846 ;** i.g LONG              **
  344. MUIA_Window_ID                  EQU $804201bd ;** isg ULONG             **
  345. MUIA_Window_InputEvent          EQU $804247d8 ;** ..g struct InputEvent * **
  346. MUIA_Window_LeftEdge            EQU $80426c65 ;** i.g LONG              **
  347. MUIA_Window_Menu                EQU $8042db94 ;** i.. struct NewMenu *  **
  348. MUIA_Window_NoMenus             EQU $80429df5 ;** .s. BOOL              **
  349. MUIA_Window_Open                EQU $80428aa0 ;** .sg BOOL              **
  350. MUIA_Window_PublicScreen        EQU $804278e4 ;** isg STRPTR            **
  351. MUIA_Window_RefWindow           EQU $804201f4 ;** is. Object *          **
  352. MUIA_Window_RootObject          EQU $8042cba5 ;** i.. Object *          **
  353. MUIA_Window_Screen              EQU $8042df4f ;** isg struct Screen *   **
  354. MUIA_Window_ScreenTitle         EQU $804234b0 ;** isg STRPTR            **
  355. MUIA_Window_SizeGadget          EQU $8042e33d ;** i.. BOOL              **
  356. MUIA_Window_SizeRight           EQU $80424780 ;** i.. BOOL              **
  357. MUIA_Window_Sleep               EQU $8042e7db ;** .sg BOOL              **
  358. MUIA_Window_Title               EQU $8042ad3d ;** isg STRPTR            **
  359. MUIA_Window_TopEdge             EQU $80427c66 ;** i.g LONG              **
  360. MUIA_Window_Width               EQU $8042dcae ;** i.g LONG              **
  361. MUIA_Window_Window              EQU $80426a42 ;** ..g struct Window *   **
  362.  
  363. MUIV_Window_ActiveObjectNone    EQU 0
  364. MUIV_Window_ActiveObjectNext    EQU -1
  365. MUIV_Window_ActiveObjectPrev    EQU -2
  366. MUIV_Window_AltHeight_MinMax     EQU 0
  367. MUIV_Window_AltHeight_Visible    EQU -100
  368. MUIV_Window_AltHeight_Screen     EQU -200
  369. MUIV_Window_AltHeight_Scaled     EQU -1000
  370. MUIV_Window_AltLeftEdge_Centered EQU -1
  371. MUIV_Window_AltLeftEdge_Moused   EQU -2
  372. MUIV_Window_AltLeftEdge_NoChange EQU -1000
  373. MUIV_Window_AltTopEdge_Centered  EQU -1
  374. MUIV_Window_AltTopEdge_Moused    EQU -2
  375. MUIV_Window_AltTopEdge_Delta     EQU -3
  376. MUIV_Window_AltTopEdge_NoChange  EQU -1000
  377. MUIV_Window_AltWidth_MinMax      EQU 0
  378. MUIV_Window_AltWidth_Visible     EQU -100
  379. MUIV_Window_AltWidth_Screen      EQU -200
  380. MUIV_Window_AltWidth_Scaled      EQU -1000
  381. MUIV_Window_Height_MinMax        EQU 0
  382. MUIV_Window_Height_Visible       EQU -100
  383. MUIV_Window_Height_Screen        EQU -200
  384. MUIV_Window_Height_Scaled        EQU -1000
  385. MUIV_Window_Height_Default       EQU -1001
  386. MUIV_Window_LeftEdge_Centered    EQU -1
  387. MUIV_Window_LeftEdge_Moused      EQU -2
  388. MUIV_Window_Menu_NoMenu          EQU -1
  389. MUIV_Window_TopEdge_Centered     EQU -1
  390. MUIV_Window_TopEdge_Moused       EQU -2
  391. MUIV_Window_TopEdge_Delta        EQU -3
  392. MUIV_Window_Width_MinMax         EQU 0
  393. MUIV_Window_Width_Visible        EQU -100
  394. MUIV_Window_Width_Screen         EQU -200
  395. MUIV_Window_Width_Scaled         EQU -1000
  396. MUIV_Window_Width_Default        EQU -1001
  397.  
  398.  
  399. ;****************************************************************************
  400. ;** Area.mui 7.15 (28.11.93)                                               **
  401. ;****************************************************************************
  402.  
  403. ;** Methods **
  404.  
  405. MUIM_AskMinMax                 EQU $80423874
  406. MUIM_Cleanup                   EQU $8042d985
  407. MUIM_Draw                      EQU $80426f3f
  408. MUIM_HandleInput               EQU $80422a1a
  409. MUIM_Hide                      EQU $8042f20f
  410. MUIM_Setup                     EQU $80428354
  411. MUIM_Show                      EQU $8042cc84
  412.  
  413. ;** Attributes **
  414.  
  415. MUIA_ApplicationObject          EQU $8042d3ee ;** ..g Object *          **
  416. MUIA_Background                 EQU $8042545b ;** is. LONG              **
  417. MUIA_BottomEdge                 EQU $8042e552 ;** ..g LONG              **
  418. MUIA_ControlChar                EQU $8042120b ;** i.. char              **
  419. MUIA_Disabled                   EQU $80423661 ;** isg BOOL              **
  420. MUIA_ExportID                   EQU $8042d76e ;** isg LONG              **
  421. MUIA_FixHeight                  EQU $8042a92b ;** i.. LONG              **
  422. MUIA_FixHeightTxt               EQU $804276f2 ;** i.. LONG              **
  423. MUIA_FixWidth                   EQU $8042a3f1 ;** i.. LONG              **
  424. MUIA_FixWidthTxt                EQU $8042d044 ;** i.. STRPTR            **
  425. MUIA_Font                       EQU $8042be50 ;** i.g struct TextFont * **
  426. MUIA_Frame                      EQU $8042ac64 ;** i.. LONG              **
  427. MUIA_FramePhantomHoriz          EQU $8042ed76 ;** i.. BOOL              **
  428. MUIA_FrameTitle                 EQU $8042d1c7 ;** i.. STRPTR            **
  429. MUIA_Height                     EQU $80423237 ;** ..g LONG              **
  430. MUIA_HorizWeight                EQU $80426db9 ;** i.. LONG              **
  431. MUIA_InnerBottom                EQU $8042f2c0 ;** i.. LONG              **
  432. MUIA_InnerLeft                  EQU $804228f8 ;** i.. LONG              **
  433. MUIA_InnerRight                 EQU $804297ff ;** i.. LONG              **
  434. MUIA_InnerTop                   EQU $80421eb6 ;** i.. LONG              **
  435. MUIA_InputMode                  EQU $8042fb04 ;** i.. LONG              **
  436. MUIA_LeftEdge                   EQU $8042bec6 ;** ..g LONG              **
  437. MUIA_Pressed                    EQU $80423535 ;** ..g BOOL              **
  438. MUIA_RightEdge                  EQU $8042ba82 ;** ..g LONG              **
  439. MUIA_Selected                   EQU $8042654b ;** isg BOOL              **
  440. MUIA_ShowMe                     EQU $80429ba8 ;** isg BOOL              **
  441. MUIA_ShowSelState               EQU $8042caac ;** i.. BOOL              **
  442. MUIA_Timer                      EQU $80426435 ;** ..g LONG              **
  443. MUIA_TopEdge                    EQU $8042509b ;** ..g LONG              **
  444. MUIA_VertWeight                 EQU $804298d0 ;** i.. LONG              **
  445. MUIA_Weight                     EQU $80421d1f ;** i.. LONG              **
  446. MUIA_Width                      EQU $8042b59c ;** ..g LONG              **
  447. MUIA_Window                     EQU $80421591 ;** ..g struct Window *   **
  448. MUIA_WindowObject               EQU $8042669e ;** ..g Object *          **
  449.  
  450. MUIV_Font_Inherit                EQU 0
  451. MUIV_Font_Normal                 EQU -1
  452. MUIV_Font_List                   EQU -2
  453. MUIV_Font_Tiny                   EQU -3
  454. MUIV_Font_Fixed                  EQU -4
  455. MUIV_Font_Title                  EQU -5
  456. MUIV_Frame_None                 EQU 0
  457. MUIV_Frame_Button               EQU 1
  458. MUIV_Frame_ImageButton          EQU 2
  459. MUIV_Frame_Text                 EQU 3
  460. MUIV_Frame_String               EQU 4
  461. MUIV_Frame_ReadList             EQU 5
  462. MUIV_Frame_InputList            EQU 6
  463. MUIV_Frame_Prop                 EQU 7
  464. MUIV_Frame_Gauge                EQU 8
  465. MUIV_Frame_Group                EQU 9
  466. MUIV_Frame_PopUp                EQU 10
  467. MUIV_Frame_Virtual              EQU 11
  468. MUIV_Frame_Slider               EQU 12
  469. MUIV_Frame_Count                EQU 13
  470. MUIV_InputMode_None              EQU 0
  471. MUIV_InputMode_RelVerify         EQU 1
  472. MUIV_InputModeRelVerify          EQU 1
  473. MUIV_InputMode_Immediate         EQU 2
  474. MUIV_InputMode_Toggle            EQU 3
  475.  
  476.  
  477. ;****************************************************************************
  478. ;** Rectangle.mui 7.14 (28.11.93)                                          **
  479. ;****************************************************************************
  480.  
  481. ;** Attributes **
  482.  
  483. MUIA_Rectangle_HBar             EQU $8042c943 ;** i.g BOOL              **
  484. MUIA_Rectangle_VBar             EQU $80422204 ;** i.g BOOL              **
  485.  
  486.  
  487.  
  488. ;****************************************************************************
  489. ;** Image.mui 7.13 (28.11.93)                                              **
  490. ;****************************************************************************
  491.  
  492. ;** Attributes **
  493.  
  494. MUIA_Image_FontMatch            EQU $8042815d ;** i.. BOOL              **
  495. MUIA_Image_FontMatchHeight      EQU $80429f26 ;** i.. BOOL              **
  496. MUIA_Image_FontMatchWidth       EQU $804239bf ;** i.. BOOL              **
  497. MUIA_Image_FreeHoriz            EQU $8042da84 ;** i.. BOOL              **
  498. MUIA_Image_FreeVert             EQU $8042ea28 ;** i.. BOOL              **
  499. MUIA_Image_OldImage             EQU $80424f3d ;** i.. struct Image *    **
  500. MUIA_Image_Spec                 EQU $804233d5 ;** i.. char *            **
  501. MUIA_Image_State                EQU $8042a3ad ;** is. LONG              **
  502.  
  503.  
  504.  
  505. ;****************************************************************************
  506. ;** Text.mui 7.15 (28.11.93)                                               **
  507. ;****************************************************************************
  508.  
  509. ;** Attributes **
  510.  
  511. MUIA_Text_Contents              EQU $8042f8dc ;** isg STRPTR            **
  512. MUIA_Text_HiChar                EQU $804218ff ;** i.. char              **
  513. MUIA_Text_PreParse              EQU $8042566d ;** isg STRPTR            **
  514. MUIA_Text_SetMax                EQU $80424d0a ;** i.. BOOL              **
  515. MUIA_Text_SetMin                EQU $80424e10 ;** i.. BOOL              **
  516.  
  517.  
  518.  
  519. ;****************************************************************************
  520. ;** String.mui 7.13 (28.11.93)                                             **
  521. ;****************************************************************************
  522.  
  523. ;** Attributes **
  524.  
  525. MUIA_String_Accept              EQU $8042e3e1 ;** isg STRPTR            **
  526. MUIA_String_Acknowledge         EQU $8042026c ;** ..g STRPTR            **
  527. MUIA_String_AttachedList        EQU $80420fd2 ;** i.. Object *          **
  528. MUIA_String_BufferPos           EQU $80428b6c ;** .sg LONG              **
  529. MUIA_String_Contents            EQU $80428ffd ;** isg STRPTR            **
  530. MUIA_String_DisplayPos          EQU $8042ccbf ;** .sg LONG              **
  531. MUIA_String_EditHook            EQU $80424c33 ;** isg struct Hook *     **
  532. MUIA_String_Format              EQU $80427484 ;** i.g LONG              **
  533. MUIA_String_Integer             EQU $80426e8a ;** isg ULONG             **
  534. MUIA_String_MaxLen              EQU $80424984 ;** i.. LONG              **
  535. MUIA_String_Reject              EQU $8042179c ;** isg STRPTR            **
  536. MUIA_String_Secret              EQU $80428769 ;** i.g BOOL              **
  537.  
  538. MUIV_String_Format_Left          EQU 0
  539. MUIV_String_Format_Center        EQU 1
  540. MUIV_String_Format_Right         EQU 2
  541.  
  542.  
  543. ;****************************************************************************
  544. ;** Prop.mui 7.12 (28.11.93)                                               **
  545. ;****************************************************************************
  546.  
  547. ;** Attributes **
  548.  
  549. MUIA_Prop_Entries               EQU $8042fbdb ;** isg LONG              **
  550. MUIA_Prop_First                 EQU $8042d4b2 ;** isg LONG              **
  551. MUIA_Prop_Horiz                 EQU $8042f4f3 ;** i.g BOOL              **
  552. MUIA_Prop_Slider                EQU $80429c3a ;** isg BOOL              **
  553. MUIA_Prop_Visible               EQU $8042fea6 ;** isg LONG              **
  554.  
  555.  
  556.  
  557. ;****************************************************************************
  558. ;** Gauge.mui 7.42 (10.02.94)                                              **
  559. ;****************************************************************************
  560.  
  561. ;** Attributes **
  562.  
  563. MUIA_Gauge_Current              EQU $8042f0dd ;** isg LONG              **
  564. MUIA_Gauge_Divide               EQU $8042d8df ;** isg BOOL              **
  565. MUIA_Gauge_Horiz                EQU $804232dd ;** i.. BOOL              **
  566. MUIA_Gauge_InfoText             EQU $8042bf15 ;** isg char *            **
  567. MUIA_Gauge_Max                  EQU $8042bcdb ;** isg LONG              **
  568.  
  569.  
  570.  
  571. ;****************************************************************************
  572. ;** Scale.mui 7.38 (10.02.94)                                              **
  573. ;****************************************************************************
  574.  
  575. ;** Attributes **
  576.  
  577. MUIA_Scale_Horiz                EQU $8042919a ;** isg BOOL              **
  578.  
  579.  
  580.  
  581. ;****************************************************************************
  582. ;** Boopsi.mui 7.37 (10.02.94)                                             **
  583. ;****************************************************************************
  584.  
  585. ;** Attributes **
  586.  
  587. MUIA_Boopsi_Class               EQU $80426999 ;** isg struct IClass *   **
  588. MUIA_Boopsi_ClassID             EQU $8042bfa3 ;** isg char *            **
  589. MUIA_Boopsi_MaxHeight           EQU $8042757f ;** isg ULONG             **
  590. MUIA_Boopsi_MaxWidth            EQU $8042bcb1 ;** isg ULONG             **
  591. MUIA_Boopsi_MinHeight           EQU $80422c93 ;** isg ULONG             **
  592. MUIA_Boopsi_MinWidth            EQU $80428fb2 ;** isg ULONG             **
  593. MUIA_Boopsi_Object              EQU $80420178 ;** ..g Object *          **
  594. MUIA_Boopsi_Remember            EQU $8042f4bd ;** i.. ULONG             **
  595. MUIA_Boopsi_TagDrawInfo         EQU $8042bae7 ;** isg ULONG             **
  596. MUIA_Boopsi_TagScreen           EQU $8042bc71 ;** isg ULONG             **
  597. MUIA_Boopsi_TagWindow           EQU $8042e11d ;** isg ULONG             **
  598.  
  599.  
  600.  
  601. ;****************************************************************************
  602. ;** Colorfield.mui 7.39 (10.02.94)                                         **
  603. ;****************************************************************************
  604.  
  605. ;** Attributes **
  606.  
  607. MUIA_Colorfield_Blue            EQU $8042d3b0 ;** isg ULONG             **
  608. MUIA_Colorfield_Green           EQU $80424466 ;** isg ULONG             **
  609. MUIA_Colorfield_Pen             EQU $8042713a ;** ..g ULONG             **
  610. MUIA_Colorfield_Red             EQU $804279f6 ;** isg ULONG             **
  611. MUIA_Colorfield_RGB             EQU $8042677a ;** isg ULONG *           **
  612.  
  613.  
  614.  
  615. ;****************************************************************************
  616. ;** List.mui 7.22 (28.11.93)                                               **
  617. ;****************************************************************************
  618.  
  619. ;** Methods **
  620.  
  621. MUIM_List_Clear                EQU $8042ad89
  622. MUIM_List_Exchange             EQU $8042468c
  623. MUIM_List_GetEntry             EQU $804280ec
  624. MUIM_List_Insert               EQU $80426c87
  625. MUIM_List_InsertSingle         EQU $804254d5
  626. MUIM_List_Jump                 EQU $8042baab
  627. MUIM_List_NextSelected         EQU $80425f17
  628. MUIM_List_Redraw               EQU $80427993
  629. MUIM_List_Remove               EQU $8042647e
  630. MUIM_List_Select               EQU $804252d8
  631. MUIM_List_Sort                 EQU $80422275
  632.  
  633. ;** Attributes **
  634.  
  635. MUIA_List_Active                EQU $8042391c ;** isg LONG              **
  636. MUIA_List_AdjustHeight          EQU $8042850d ;** i.. BOOL              **
  637. MUIA_List_AdjustWidth           EQU $8042354a ;** i.. BOOL              **
  638. MUIA_List_CompareHook           EQU $80425c14 ;** is. struct Hook *     **
  639. MUIA_List_ConstructHook         EQU $8042894f ;** is. struct Hook *     **
  640. MUIA_List_DestructHook          EQU $804297ce ;** is. struct Hook *     **
  641. MUIA_List_DisplayHook           EQU $8042b4d5 ;** is. struct Hook *     **
  642. MUIA_List_Entries               EQU $80421654 ;** ..g LONG              **
  643. MUIA_List_First                 EQU $804238d4 ;** ..g LONG              **
  644. MUIA_List_Format                EQU $80423c0a ;** isg STRPTR            **
  645. MUIA_List_MultiTestHook         EQU $8042c2c6 ;** is. struct Hook *     **
  646. MUIA_List_Quiet                 EQU $8042d8c7 ;** .s. BOOL              **
  647. MUIA_List_SourceArray           EQU $8042c0a0 ;** i.. APTR              **
  648. MUIA_List_Title                 EQU $80423e66 ;** isg char *            **
  649. MUIA_List_Visible               EQU $8042191f ;** ..g LONG              **
  650.  
  651. MUIV_List_Active_Off             EQU -1
  652. MUIV_List_Active_Top             EQU -2
  653. MUIV_List_Active_Bottom          EQU -3
  654. MUIV_List_Active_Up              EQU -4
  655. MUIV_List_Active_Down            EQU -5
  656. MUIV_List_Active_PageUp          EQU -6
  657. MUIV_List_Active_PageDown        EQU -7
  658. MUIV_List_ConstructHook_String   EQU -1
  659. MUIV_List_CopyHook_String        EQU -1
  660. MUIV_List_CursorType_None        EQU 0
  661. MUIV_List_CursorType_Bar         EQU 1
  662. MUIV_List_CursorType_Rect        EQU 2
  663. MUIV_List_DestructHook_String    EQU -1
  664.  
  665.  
  666. ;****************************************************************************
  667. ;** Floattext.mui 7.40 (10.02.94)                                          **
  668. ;****************************************************************************
  669.  
  670. ;** Attributes **
  671.  
  672. MUIA_Floattext_Justify          EQU $8042dc03 ;** isg BOOL              **
  673. MUIA_Floattext_SkipChars        EQU $80425c7d ;** is. STRPTR            **
  674. MUIA_Floattext_TabSize          EQU $80427d17 ;** is. LONG              **
  675. MUIA_Floattext_Text             EQU $8042d16a ;** isg STRPTR            **
  676.  
  677.  
  678.  
  679. ;****************************************************************************
  680. ;** Volumelist.mui 7.37 (10.02.94)                                         **
  681. ;****************************************************************************
  682.  
  683.  
  684. ;****************************************************************************
  685. ;** Scrmodelist.mui 7.45 (10.02.94)                                        **
  686. ;****************************************************************************
  687.  
  688. ;** Attributes **
  689.  
  690.  
  691.  
  692.  
  693. ;****************************************************************************
  694. ;** Dirlist.mui 7.38 (10.02.94)                                            **
  695. ;****************************************************************************
  696.  
  697. ;** Methods **
  698.  
  699. MUIM_Dirlist_ReRead            EQU $80422d71
  700.  
  701. ;** Attributes **
  702.  
  703. MUIA_Dirlist_AcceptPattern      EQU $8042760a ;** is. STRPTR            **
  704. MUIA_Dirlist_Directory          EQU $8042ea41 ;** is. STRPTR            **
  705. MUIA_Dirlist_DrawersOnly        EQU $8042b379 ;** is. BOOL              **
  706. MUIA_Dirlist_FilesOnly          EQU $8042896a ;** is. BOOL              **
  707. MUIA_Dirlist_FilterDrawers      EQU $80424ad2 ;** is. BOOL              **
  708. MUIA_Dirlist_FilterHook         EQU $8042ae19 ;** is. struct Hook *     **
  709. MUIA_Dirlist_MultiSelDirs       EQU $80428653 ;** is. BOOL              **
  710. MUIA_Dirlist_NumBytes           EQU $80429e26 ;** ..g LONG              **
  711. MUIA_Dirlist_NumDrawers         EQU $80429cb8 ;** ..g LONG              **
  712. MUIA_Dirlist_NumFiles           EQU $8042a6f0 ;** ..g LONG              **
  713. MUIA_Dirlist_Path               EQU $80426176 ;** ..g STRPTR            **
  714. MUIA_Dirlist_RejectIcons        EQU $80424808 ;** is. BOOL              **
  715. MUIA_Dirlist_RejectPattern      EQU $804259c7 ;** is. STRPTR            **
  716. MUIA_Dirlist_SortDirs           EQU $8042bbb9 ;** is. LONG              **
  717. MUIA_Dirlist_SortHighLow        EQU $80421896 ;** is. BOOL              **
  718. MUIA_Dirlist_SortType           EQU $804228bc ;** is. LONG              **
  719. MUIA_Dirlist_Status             EQU $804240de ;** ..g LONG              **
  720.  
  721. MUIV_Dirlist_SortDirs_First      EQU 0
  722. MUIV_Dirlist_SortDirs_Last       EQU 1
  723. MUIV_Dirlist_SortDirs_Mix        EQU 2
  724. MUIV_Dirlist_SortType_Name       EQU 0
  725. MUIV_Dirlist_SortType_Date       EQU 1
  726. MUIV_Dirlist_SortType_Size       EQU 2
  727. MUIV_Dirlist_Status_Invalid      EQU 0
  728. MUIV_Dirlist_Status_Reading      EQU 1
  729. MUIV_Dirlist_Status_Valid        EQU 2
  730.  
  731.  
  732. ;****************************************************************************
  733. ;** Group.mui 7.12 (28.11.93)                                              **
  734. ;****************************************************************************
  735.  
  736. ;** Methods **
  737.  
  738.  
  739. ;** Attributes **
  740.  
  741. MUIA_Group_ActivePage           EQU $80424199 ;** isg LONG              **
  742. MUIA_Group_Child                EQU $804226e6 ;** i.. Object *          **
  743. MUIA_Group_Columns              EQU $8042f416 ;** is. LONG              **
  744. MUIA_Group_Horiz                EQU $8042536b ;** i.. BOOL              **
  745. MUIA_Group_HorizSpacing         EQU $8042c651 ;** is. LONG              **
  746. MUIA_Group_PageMode             EQU $80421a5f ;** is. BOOL              **
  747. MUIA_Group_Rows                 EQU $8042b68f ;** is. LONG              **
  748. MUIA_Group_SameHeight           EQU $8042037e ;** i.. BOOL              **
  749. MUIA_Group_SameSize             EQU $80420860 ;** i.. BOOL              **
  750. MUIA_Group_SameWidth            EQU $8042b3ec ;** i.. BOOL              **
  751. MUIA_Group_Spacing              EQU $8042866d ;** is. LONG              **
  752. MUIA_Group_VertSpacing          EQU $8042e1bf ;** is. LONG              **
  753.  
  754.  
  755.  
  756. ;****************************************************************************
  757. ;** Group.mui 7.12 (28.11.93)                                              **
  758. ;****************************************************************************
  759.  
  760. ;** Attributes **
  761.  
  762. MUIA_Register_Frame             EQU $8042349b ;** i.g BOOL              **
  763. MUIA_Register_Titles            EQU $804297ec ;** i.g STRPTR *          **
  764.  
  765.  
  766.  
  767. ;****************************************************************************
  768. ;** Virtgroup.mui 7.37 (10.02.94)                                          **
  769. ;****************************************************************************
  770.  
  771. ;** Methods **
  772.  
  773.  
  774. ;** Attributes **
  775.  
  776. MUIA_Virtgroup_Height           EQU $80423038 ;** ..g LONG              **
  777. MUIA_Virtgroup_Left             EQU $80429371 ;** isg LONG              **
  778. MUIA_Virtgroup_Top              EQU $80425200 ;** isg LONG              **
  779. MUIA_Virtgroup_Width            EQU $80427c49 ;** ..g LONG              **
  780.  
  781.  
  782.  
  783. ;****************************************************************************
  784. ;** Scrollgroup.mui 7.35 (10.02.94)                                        **
  785. ;****************************************************************************
  786.  
  787. ;** Attributes **
  788.  
  789. MUIA_Scrollgroup_Contents       EQU $80421261 ;** i.. Object *          **
  790.  
  791.  
  792.  
  793. ;****************************************************************************
  794. ;** Scrollbar.mui 7.12 (28.11.93)                                          **
  795. ;****************************************************************************
  796.  
  797.  
  798. ;****************************************************************************
  799. ;** Listview.mui 7.13 (28.11.93)                                           **
  800. ;****************************************************************************
  801.  
  802. ;** Attributes **
  803.  
  804. MUIA_Listview_ClickColumn       EQU $8042d1b3 ;** ..g LONG              **
  805. MUIA_Listview_DefClickColumn    EQU $8042b296 ;** isg LONG              **
  806. MUIA_Listview_DoubleClick       EQU $80424635 ;** i.g BOOL              **
  807. MUIA_Listview_Input             EQU $8042682d ;** i.. BOOL              **
  808. MUIA_Listview_List              EQU $8042bcce ;** i.. Object *          **
  809. MUIA_Listview_MultiSelect       EQU $80427e08 ;** i.. LONG              **
  810. MUIA_Listview_SelectChange      EQU $8042178f ;** ..g BOOL              **
  811.  
  812. MUIV_Listview_MultiSelect_None    EQU 0
  813. MUIV_Listview_MultiSelect_Default EQU 1
  814. MUIV_Listview_MultiSelect_Shifted EQU 2
  815. MUIV_Listview_MultiSelect_Always  EQU 3
  816.  
  817.  
  818. ;****************************************************************************
  819. ;** Radio.mui 7.12 (28.11.93)                                              **
  820. ;****************************************************************************
  821.  
  822. ;** Attributes **
  823.  
  824. MUIA_Radio_Active               EQU $80429b41 ;** isg LONG              **
  825. MUIA_Radio_Entries              EQU $8042b6a1 ;** i.. STRPTR *          **
  826.  
  827.  
  828.  
  829. ;****************************************************************************
  830. ;** Cycle.mui 7.16 (28.11.93)                                              **
  831. ;****************************************************************************
  832.  
  833. ;** Attributes **
  834.  
  835. MUIA_Cycle_Active               EQU $80421788 ;** isg LONG              **
  836. MUIA_Cycle_Entries              EQU $80420629 ;** i.. STRPTR *          **
  837.  
  838. MUIV_Cycle_Active_Next           EQU -1
  839. MUIV_Cycle_Active_Prev           EQU -2
  840.  
  841.  
  842. ;****************************************************************************
  843. ;** Slider.mui 7.12 (28.11.93)                                             **
  844. ;****************************************************************************
  845.  
  846. ;** Attributes **
  847.  
  848. MUIA_Slider_Level               EQU $8042ae3a ;** isg LONG              **
  849. MUIA_Slider_Max                 EQU $8042d78a ;** i.. LONG              **
  850. MUIA_Slider_Min                 EQU $8042e404 ;** i.. LONG              **
  851. MUIA_Slider_Quiet               EQU $80420b26 ;** i.. BOOL              **
  852. MUIA_Slider_Reverse             EQU $8042f2a0 ;** isg BOOL              **
  853.  
  854.  
  855.  
  856. ;****************************************************************************
  857. ;** Coloradjust.mui 7.47 (10.02.94)                                        **
  858. ;****************************************************************************
  859.  
  860. ;** Attributes **
  861.  
  862. MUIA_Coloradjust_Blue           EQU $8042b8a3 ;** isg ULONG             **
  863. MUIA_Coloradjust_Green          EQU $804285ab ;** isg ULONG             **
  864. MUIA_Coloradjust_ModeID         EQU $8042ec59 ;** isg ULONG             **
  865. MUIA_Coloradjust_Red            EQU $80420eaa ;** isg ULONG             **
  866. MUIA_Coloradjust_RGB            EQU $8042f899 ;** isg ULONG *           **
  867.  
  868.  
  869.  
  870. ;****************************************************************************
  871. ;** Palette.mui 7.36 (10.02.94)                                            **
  872. ;****************************************************************************
  873.  
  874. ;** Attributes **
  875.  
  876. MUIA_Palette_Entries            EQU $8042a3d8 ;** i.g struct MUI_Palette_Entry * **
  877. MUIA_Palette_Groupable          EQU $80423e67 ;** isg BOOL              **
  878. MUIA_Palette_Names              EQU $8042c3a2 ;** isg char **           **
  879.  
  880.  
  881.  
  882. ;****************************************************************************
  883. ;** Colorpanel.mui 7.12 (10.02.94)                                         **
  884. ;****************************************************************************
  885.  
  886. ;** Methods **
  887.  
  888.  
  889. ;** Attributes **
  890.  
  891.  
  892.  
  893.  
  894. ;****************************************************************************
  895. ;** Popstring.mui 7.19 (02.12.93)                                          **
  896. ;****************************************************************************
  897.  
  898. ;** Methods **
  899.  
  900. MUIM_Popstring_Close           EQU $8042dc52
  901. MUIM_Popstring_Open            EQU $804258ba
  902.  
  903. ;** Attributes **
  904.  
  905. MUIA_Popstring_Button           EQU $8042d0b9 ;** i.g Object *          **
  906. MUIA_Popstring_CloseHook        EQU $804256bf ;** isg struct Hook *     **
  907. MUIA_Popstring_OpenHook         EQU $80429d00 ;** isg struct Hook *     **
  908. MUIA_Popstring_String           EQU $804239ea ;** i.g Object *          **
  909. MUIA_Popstring_Toggle           EQU $80422b7a ;** isg BOOL              **
  910.  
  911.  
  912.  
  913. ;****************************************************************************
  914. ;** Popobject.mui 7.18 (02.12.93)                                          **
  915. ;****************************************************************************
  916.  
  917. ;** Attributes **
  918.  
  919. MUIA_Popobject_Follow           EQU $80424cb5 ;** isg BOOL              **
  920. MUIA_Popobject_Light            EQU $8042a5a3 ;** isg BOOL              **
  921. MUIA_Popobject_Object           EQU $804293e3 ;** i.g Object *          **
  922. MUIA_Popobject_ObjStrHook       EQU $8042db44 ;** isg struct Hook *     **
  923. MUIA_Popobject_StrObjHook       EQU $8042fbe1 ;** isg struct Hook *     **
  924. MUIA_Popobject_Volatile         EQU $804252ec ;** isg BOOL              **
  925.  
  926.  
  927.  
  928. ;****************************************************************************
  929. ;** Popasl.mui 7.5 (03.12.93)                                              **
  930. ;****************************************************************************
  931.  
  932. ;** Attributes **
  933.  
  934. MUIA_Popasl_Active              EQU $80421b37 ;** ..g BOOL              **
  935. MUIA_Popasl_StartHook           EQU $8042b703 ;** isg struct Hook *     **
  936. MUIA_Popasl_StopHook            EQU $8042d8d2 ;** isg struct Hook *     **
  937. MUIA_Popasl_Type                EQU $8042df3d ;** i.g ULONG             **
  938.  
  939. ;****************************************************************************
  940. ;** Macro section - Some macros thrown away                                **
  941. ;****************************************************************************
  942.  
  943. *** Macro to move a tagitem to stack if it is given
  944.  
  945. cmv3  MACRO ; Tag
  946.    IFNC  '\1',''
  947.       move.l   \1,-(sp)
  948.    ENDC
  949.       ENDM
  950.  
  951. *** DoMethod macro for easier assembler DoMethod'ing, max 20 tagitems.
  952. *** Note that _DoMethod is defined in amiga.lib, so you must link
  953. *** your own object code with it.
  954.  
  955. DoMethod    MACRO ; obj, MethodID, tag1, [...]
  956.             movem.l  a0/a2,-(sp)
  957.             move.l   sp,a2
  958.             clr.l    -(sp)
  959.             cmv3     \L
  960.             cmv3     \K
  961.             cmv3     \J
  962.             cmv3     \I
  963.             cmv3     \H
  964.             cmv3     \G
  965.             cmv3     \F
  966.             cmv3     \E
  967.             cmv3     \D
  968.             cmv3     \C
  969.             cmv3     \B
  970.             cmv3     \A
  971.             cmv3     \9
  972.             cmv3     \8
  973.             cmv3     \7
  974.             cmv3     \6
  975.             cmv3     \5
  976.             cmv3     \4
  977.             cmv3     \3
  978.             cmv3     \2
  979.             cmv3     \1
  980.             jsr      _DoMethod
  981.             move.l   a2,sp
  982.             movem.l  (sp)+,a0/a2
  983.             ENDM
  984.  
  985. *** MUI_Request macro for easier assembler MUI_Request'ing, max
  986. *** 20 tagitems.
  987.  
  988. MUI_Request MACRO    ; app,win,flags,title,gadgets,format,[params,...]
  989.             movem.l  a0-a4,-(sp)
  990.             move.l   sp,a4
  991.             cmv3     \L
  992.             cmv3     \K
  993.             cmv3     \J
  994.             cmv3     \I
  995.             cmv3     \H
  996.             cmv3     \G
  997.             cmv3     \F
  998.             cmv3     \E
  999.             cmv3     \D
  1000.             cmv3     \C
  1001.             cmv3     \B
  1002.             cmv3     \A
  1003.             cmv3     \9
  1004.             cmv3     \8
  1005.             cmv3     \7
  1006.             move.l   a4,a3
  1007.             move.l   #\6,a2
  1008.             move.l   #\5,a1
  1009.             move.l   #\4,a0
  1010.             move.l   #\3,d2
  1011.             move.l   \2,d1
  1012.             move.l   \1,d0
  1013.             CALLMUI  MUI_RequestA
  1014.             move.l   a4,sp
  1015.             movem.l  (sp)+,a0-a4
  1016.             ENDM
  1017.  
  1018. Child          EQU   MUIA_Group_Child
  1019. SubWindow      EQU   MUIA_Application_Window
  1020. WindowContents EQU   MUIA_Window_RootObject
  1021.  
  1022.  
  1023. ****************************************************************************
  1024. **
  1025. ** Controlling Objects
  1026. ** -------------------
  1027. **
  1028. ** set() and get() are two short stubs for BOOPSI GetAttr() and SetAttrs()
  1029. ** calls:
  1030. **
  1031. ** {
  1032. **    char *x;
  1033. **
  1034. **    set(obj,MUIA_String_Contents,"foobar");
  1035. **    get(obj,MUIA_String_Contents,&x);
  1036. **
  1037. **    printf("gadget contains '%s'\n",x);
  1038. ** }
  1039. **
  1040. ****************************************************************************
  1041.  
  1042. ****************************************************************************
  1043. ***
  1044. *** And the above C example in assembler:
  1045. ***
  1046. *** seti obj,#MUIA_String_Contents,#foobar
  1047. *** geti obj,#MUIA_String_Contents,#x
  1048. ***   move.l   #myfmt,d1
  1049. ***   move.l   #data,d2
  1050. ***   CALLDOS VPrintf
  1051. ***
  1052. *** foobar     dc.b  "foobar",0
  1053. ***            even
  1054. *** data       dc.l  x
  1055. *** x          dcb.b 10
  1056. *** myfmt      dc.b  "gadget contains '%s'",10,0
  1057. ***            even
  1058. ***
  1059. *** The names of the set and get macros have been changed to seti and geti
  1060. *** since most assemblers already have the pseudo op-code SET.
  1061. *** Note that seti is designed to take multiple tagitems (max 8).
  1062. ***
  1063. ****************************************************************************
  1064.  
  1065. geti  MACRO ; obj,attr,store
  1066.       move.l   \2,d0
  1067.       move.l   \1,a0
  1068.       move.l   \3,a1
  1069.       CALLINT GetAttr
  1070.       ENDM
  1071. seti  MACRO ; obj,attr,value [,attr,value,...]
  1072.       move.l   sp,a2
  1073.       cmv3     #TAG_DONE
  1074.       cmv3     \9
  1075.       cmv3     \8
  1076.       cmv3     \7
  1077.       cmv3     \6
  1078.       cmv3     \5
  1079.       cmv3     \4
  1080.       cmv3     \3
  1081.       cmv3     \2
  1082.       move.l   \1,a0
  1083.       move.l   sp,a1
  1084.       CALLINT SetAttrsA
  1085.       move.l   a2,sp
  1086.       ENDM
  1087.  
  1088. nnseti  MACRO ; obj,attr,value [,attr,value,...]
  1089.         move.l   sp,a2
  1090.         cmv3     #TAG_DONE
  1091.         cmv3     #TRUE
  1092.         cmv3     #MUIA_Notify
  1093.         cmv3     \9
  1094.         cmv3     \8
  1095.         cmv3     \7
  1096.         cmv3     \6
  1097.         cmv3     \5
  1098.         cmv3     \4
  1099.         cmv3     \3
  1100.         cmv3     \2
  1101.         move.l   \1,a0
  1102.         move.l   sp,a1
  1103.         CALLINT SetAttrsA
  1104.         move.l   a2,sp
  1105.         ENDM
  1106.  
  1107. setmutex MACRO ; obj,n
  1108.       seti \1,#MUIA_Radio_Active,\2
  1109.       ENDM
  1110. setcycle MACRO ; obj,n
  1111.       seti \1,#MUIA_Cycle_Active,\2
  1112.       ENDM
  1113. setstring MACRO ; obj,s
  1114.       seti \1,#MUIA_String_Contents,\2
  1115.       ENDM
  1116. setcheckmark MACRO ; obj,b
  1117.       seti \1,#MUIA_Selected,\2
  1118.       ENDM
  1119. setslider MACRO ; obj,l
  1120.       seti \1,#MUIA_Slider_Level,\2
  1121.       ENDM
  1122.  
  1123. ***************************************************************************
  1124. **
  1125. ** For Boopsi Image Implementors Only:
  1126. **
  1127. ** If MUI is using a boopsi image object, it will send a special method
  1128. ** immediately after object creation. This method has a parameter structure
  1129. ** where the boopsi can fill in its minimum and maximum size and learn if
  1130. ** its used in a horizontal or vertical context.
  1131. **
  1132. ** The boopsi image must use the method id (MUIM_BoopsiQuery) as return
  1133. ** value. That's how MUI sees that the method is implemented.
  1134. **
  1135. ** Note: MUI does not depend on this method. If the boopsi image doesn't
  1136. **       implement it, minimum size will be 0 and maximum size unlimited.
  1137. **
  1138. ***************************************************************************
  1139.  
  1140. MUIM_BoopsiQuery EQU          $80427157 ;this is send to the boopsi and
  1141.                                         ;must be used as return value
  1142.  
  1143. ;;;;;;;;;!!!!!!!!!!!!!
  1144.  
  1145. ;                STRUCTURE    MUI_BoopsiQuery,0   ; parameter structure
  1146. ;    ULONG mbq_MethodID               ; always MUIM_BoopsiQuery
  1147. ;    STRUCT Screen,mbq_Screen         ; obsolete, use mbq_RenderInfo
  1148. ;    ULONG mbq_Flags                  ; read only, see below
  1149. ;    LONG mbq_MinWidth                ; write only, fill in min width 
  1150. ;    LONG mbq_MinHeight               ; write only, fill in min height
  1151. ;    LONG mbq_MaxWidth                ; write only, fill in max width 
  1152. ;    LONG mbq_MaxHeight               ; write only, fill in max height
  1153. ;    LONG mbq_DefWidth                ; write only, fill in def width 
  1154. ;    LONG mbq_DefHeight               ; write only, fill in def height
  1155. ;    struct MUI_RenderInfo *mbq_RenderInfo   ; read only, display context
  1156. ;                LABEL        MUI_BoopsiQuery_SIZEOF
  1157.  
  1158.     ;may grow in future ...
  1159.  
  1160. ;;;; MUIP_BoopsiQuery EQU MUI_BoopsiQuery  ; old structure name
  1161.  
  1162. MBQF_HORIZ       EQU 1<<0           ; object used in a horizontal
  1163.                                      ; context (else vertical)    
  1164.  
  1165. MBQ_MUI_MAXMAX   EQU 10000          ; use this for unlimited MaxWidth/Height
  1166.  
  1167.  
  1168.    ENDC  ;LIBRARIES_MUI_I
  1169.